home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / comm / www / KidHTML1_25.lha / KidHTML1.25 / Script / cursebot.js < prev    next >
Encoding:
Text File  |  1998-08-25  |  11.5 KB  |  265 lines
  1. <!-- TWO STEPS TO INSTALL CURSEBOT:
  2.  
  3.    1.  Paste the coding into the HEAD of your HTML document
  4.    2.  Put the last coding into the BODY of your HTML document  -->
  5.  
  6. <!-- STEP ONE: Copy this code into the HEAD of your HTML document  -->
  7.  
  8. <HEAD>
  9.  
  10. <SCRIPT LANGUAGE="JavaScript">
  11.  
  12. <!-- This script and many more are available online from -->
  13. <!-- The JavaScript Source!! http://javascriptsource.com -->
  14.  
  15. <!-- Original:  Cut-N-Paste JavaScript -->
  16.  
  17. <!-- Begin
  18. isn1="*00Your mouth spews*01You are*02Your mother wears*03Your"
  19. +" Village Priest is*04Your Eleventh Child will be*05Your Mate"
  20. +"rnal Ancestors are*06Your Personal Trainer is*07Your spouse "
  21. +"thinks you are*08Your mind resembles*09Your chances for the "
  22. +"future are*10Your mother-in-law loves*11Your closest friend "
  23. +"is*12Your breath resembles*13Your right nostril is dripping*"
  24. +"14Your politics are*15Your cherished desires are*16Your next"
  25. +" meal should be*17Your bedroom resembles*18Your refrigerator"
  26. +" smells like*19Your manners are no better than*20I saw you e"
  27. +"ating and enjoying*21Next Friday you will consume*22May you "
  28. +"wallow in*23May you swim in*24May you drown in*25May you tak"
  29. +"e simple pleasure in*26May you find your hot tub filled with"
  30. +"*27May you find your kitchen sink overflowing with*28May you"
  31. +" be immersed in*29You secretly aspire to drink*30May you din"
  32. +"e often on*31May you be caught dining on*32May you become an"
  33. +" obsessive collector of*33May you find your car filled with*"
  34. +"34May you blurt out that your boss is the*35Your garden shou"
  35. +"ld be flooded with*36May your basement overflow with*37May y"
  36. +"our underwear be filled with*38May your drawers be filled wi"
  37. +"th*39May you float forever in*40May your feet be encased in*"
  38. +"41May you be forever entombed in*42I hate to tell you, but t"
  39. +"here, caught in your teeth is*43May you step in*44May your c"
  40. +"aptors feed you on*45The talk around the office is that you "
  41. +"eat*46May your private parts be encrusted with*47May the sta"
  42. +"ins on your clothing be only*48May your porridge be infused "
  43. +"with*49Your sock drawer is now filled with*50Your supervisor"
  44. +" secretly saves*51Caution: Someone knows about your foot fetish"
  45. +"*52May you die of*53Remeber that day you first tasted"
  46. +"*54May all your wastebaskets suddently overflow wit"
  47. +"h*55May your roof drip*56May you be without garlic to spice "
  48. +"your meal of *57May your trough be filled with*58May your hi"
  49. +"p pockets overflow with*59May your doctor prescribe*60May yo"
  50. +"u trip and fall into*61Yeah? Well, your Mentor wears combat "
  51. +"boots filled with*62So what if I like anchovies and*63You re"
  52. +"lish*64I'm going to tell.  You play with*65Your body reeks o"
  53. +"f*66May your in-basket overflow with*67May your inlaws learn"
  54. +" of your fondness for*68May you smear yourself with*69Your w"
  55. +"ish is granted: drink*70Everyone knows you bathe in*71"; 
  56. isn2="*00aniline*01virescent*02aquamarine*03ashy*04atramentous"
  57. +"*05aureate*06bloody*07bluish*08brinded*09bronze*10cadaverous"
  58. +"*11cadmium*12carmine*13carnadine*14carroty*15cerulean*16citr"
  59. +"ine*17cloudy*18cochineal*19crimson*20crude*21cyanic*22cymoph"
  60. +"anous*23dappled*24diaphanous*25dingy*26drab*27dun*28emerald*"
  61. +"29erubescent*30fallow*31flashy*32flavous*33florid*34florid*3"
  62. +"5foggy*36fulvid*37fulvous*38fuscous*39garish*40gaudy*41gauzy"
  63. +"*42ghastly*43glaucous*44gray*45greenish*46harlequin*47hueles"
  64. +"s*48impervious*49infuscated*50iridescent*51jaundiced*52khaki"
  65. +"*53lack-luster*54lavender*55leaden*56limpid*57liver-colored*"
  66. +"58lurid*59luteous*60mantled*61maroon*62matted*63milky*64mist"
  67. +"y*65misty*66motley*67mottled*68ocherous*69opacous*70opaline*"
  68. +"71orangish*72pallid*73pallorous*74pellucid*75piebald*76polyc"
  69. +"hromatic*77porraceous*78puce*79purplish*80red*81roseate*82ro"
  70. +"uged*83rubicund*84ruddy*85russet*86rusty*87rusty*88sallow*89"
  71. +"sacharine*90scarlet*91shady*92skewbald*93smalty*94smoky*95ye"
  72. +"llowish*96somber*97striated*98tallowy*99";
  73. isn3="*00abomination*01soilure*02abscess*03averruncation*04bel"
  74. +"ch*05carbuncle*06caries*07carrion*08catamenia*09cesspool*10c"
  75. +"heese-parings*11coarseness*12compost*13contaminate*14contami"
  76. +"nation*15coprolite*16corruption*17dandruff*18decay*19defedat"
  77. +"ion*20defilement*21discharge*22disgorgement*23draff*24draggl"
  78. +"etail*25drainage*26dregs*27drool*28dry-rot*29dung*30dunghill"
  79. +"*31dunghill*32earth-closet*33effusion*34eliminant*35emanatio"
  80. +"n*36emission*37eructate*38evacuation*39excrement*40excreta*4"
  81. +"1excretion*42expectorate*43extravasation*44exudation*45fecul"
  82. +"ence*46fetor*47filth*48foulings*49foulness*50garbage*51grime"
  83. +"*52guano*53hog-wash*54immundity*55impurity*56infection*57kec"
  84. +"k*58leucorrhea*59maggots*60manure*61matter*62mildew*63mire*6"
  85. +"4mold*65mucidness*66muck*67mucor*68mud*69nastiness*70off-scu"
  86. +"m*71offal*72ordure*73paracentesis*74perspiration*75pollution"
  87. +"*76purulence*77pus*78putrescence*79quagmire*80refuse*81rheum"
  88. +"*82rot*83rubigo*84scurf*85secretion*86silt*87slabber*88slave"
  89. +"r*89slime*90slobber*91slop*92slosh*93slubber*94sludge*95slus"
  90. +"h*96smudge*97smutch*98soiliness*99";
  91. isn4="*00accreting*01accruing*02aggrandizing*03aggravating*04a"
  92. +"scending*05augmenting*06billowing*07biting*08breathing*09bro"
  93. +"wsing*10budding*11cacating*12caressing*13cherishing*14chewin"
  94. +"g*15chomping*16clasping*17coddling*18coveting*19craving*20cr"
  95. +"eating*21cuddling*22dandling*23dilating*24distending*25dottl"
  96. +"ing*26draining*27dripping*28ejecting*29eliminating*30evacuat"
  97. +"ing*31exhaling*32expanding*33expelling*34extending*35extrava"
  98. +"sating*36exuding*37fingering*38fondling*39foraging*40gnawing"
  99. +"*41growing*42heaving*43imbedding*44infusing*45ingesting*46in"
  100. +"tumescing*47kissing*48licking*49littering*50masticating*51mu"
  101. +"ltiplying*52needing*53nestling*54nuzzling*55obtruding*56obtu"
  102. +"ding*57ogling*58oozing*59osculating*60patulating*61plucking*" +"62plundering*63protruding*64puffing*65pugging*66puking*67pur"
  103. +"sing*68ravening*69regurgitating*70rejecting*71relishing*72re" +"quiring*73ruining*74savoring*75savoring*76secreting*77sippin"
  104. +"g*78smelling*79smothering*80sneezing*81spoiling*82stealing*8"
  105. +"3subjoining*84subsisting*85succoring*86sucking*87supping*88s"
  106. +"wigging*89swilling*90sheep-eyeing*91tasting*92tasting*93thie"
  107. +"ving*94tippling*95touching*96turgescing*97wanting*98waxing*99";
  108. isn5="*00anterior cavity*01anterior gland*02anterior hole*03an"
  109. +"terior muscle*04anterior orifice*05anterior pores*06dirt cav"
  110. +"ity*07dirt hole*08dirt orifice*09dirt pores*10excreting cavi"
  111. +"ty*11excreting gullet*12excreting holes*13excreting hollow*1"
  112. +"4excreting nooks*15excreting orifices*16excreting slot*17exc"
  113. +"reting void*18eye orifices*19eye pores*20eye voids*21navel o"
  114. +"rifice*22ooze cavity*23ooze gullet*24ooze hole*25ooze nooks*"
  115. +"26ooze orifices*27ooze slot*28ooze void*29refuse cavity*30re"
  116. +"fuse gullet*31refuse hole*32refuse hollow*33refuse nooks*34r"
  117. +"efuse orifice*35refuse slot*36refuse spaces*37refuse void*38"
  118. +"secret cavity*39secret gland*40secret hole*41secret muscle*4"
  119. +"2secret orifice*43secret pore*44secret slot*45secret void*46"
  120. +"slime cavity*47slime gullet*48slime hole*49slime hollow*50sl"
  121. +"ime muscle*51slime nooks*52slime openings*53slime orifices*5"
  122. +"4slime pores*55slime slot*56slime spaces*57slime void*58swea"
  123. +"t cavities*59sweat cavity*60sweat gullet*61sweat hole*62swea"
  124. +"t hollow*63sweat nooks*64sweat openings*65sweat orifices*66s"
  125. +"weat pores*67sweat slot*68sweat spaces*69sweat void*70undera"
  126. +"rm cavity*71underarm gullet*72underarm hole*73underarm hollo"
  127. +"w*74underarm muscle*75underarm nooks*76underarm openings*77u"
  128. +"nderarm orifices*78underarm pores*79underarm slot*80underarm"
  129. +" spaces*81underarm void*82unmentionable cavity*83unmentionab"
  130. +"le gullet*84unmentionable hole*85unmentionable hollow*86unme"
  131. +"ntionable muscle*87unmentionable nook*88unmentionable openin"
  132. +"gs*89unmentionable orifices*90unmentionable pores*91unmentio"
  133. +"nable slot*92unmentionable spaces*93unmentionable void*94war"
  134. +"t cavity*95wart gullet*96wart holes*97wart hollows*98wart no"
  135. +"oks*99";
  136. isn6="*00Bluthian*01Neranian*02Warterian*03Xanterian*04Bexian*"
  137. +"05Cledugian*06Chugnetian*07Chyderian*08Dygian*09Danthian*10D"
  138. +"eechnetian*11Eegrudgian*12Eichhornian*13Foognidian*14Fuhbagi"
  139. +"an*15Fidwoortian*16Fahdgian*17Feeshian*18Gharzan*19Gaazhogia"
  140. +"n*20Geeshworgian*21Gitchshidian*22Goopragian*23Gughokian*24H"
  141. +"aagpokian*25Herwadian*26Hijkakian*27Hoolpodian*28Huquadian*2"
  142. +"9Jadtypian*30Jezchupian*31Jymptordian*32Kurkian*33Koodgian*3"
  143. +"4Lyxian*35Madrigian*36Nastian*37Abysmian*38Ickian*39Vomitian"
  144. +"*40Putridgian*41Quensbian*42Tawgrian*43Perdian*44Tiliwidian*"
  145. +"45Czerian*46Sizludian*47Kherbugian*48Quisnaglian*49Xertydigi"
  146. +"an*50Mudgrubbian*51Boogfudian*52Lilgoogian*53Luthdrungian*54"
  147. +"Jugrudian*55Derrydinian*56Vudgnagian*57Vooptedgian*58Quooxmu"
  148. +"dgian*59Babbletogian*60Bugturgoorian*61Hogsodian*62Trufpatia"
  149. +"n*63Sowslinkian*64Crabkrudian*65Chartreudian*66Schnigerian*6"
  150. +"7Zitsneakian*68Cystrigian*69Crongian*70Kterigadian*71";
  151. isn7="*00Slizidge*01Burtidge*02Tisd*03Turt*04Bunt*05Burd*06Sac"
  152. +"und*07Trund*08Crezd*09Hnot*10Jeck*11Kontluger*12Chitter*13Ch"
  153. +"unt*14Chooytop*15Chingdap*16Dyagenob*17Dugwart*18Pooper*19Ug"
  154. +"ly*20Abomination*21Fudwhomper*22Turtleg*23Waggletop*24Yaghor"
  155. +"d*25Marmwarb*26Yemzid*27Phutgrab*28Fetsmell*29Schaber*30Nerd"
  156. +"nort*31Papperflabian*32Nudnuge*33Whiperbirt*34Sibbergrunt*35"
  157. +"Saberdunt*36Thigwhip*37Whippinthig*38Zyzygdung*39Papchung*40"
  158. +"Stinkbug*41Fardschid*42Yellowsnot*43Mucousdripper*44Purplebu"
  159. +"tt*45Hemorhonk*46Bladderpuff*47Hohogridge*48Klitbunkit*49Wax"
  160. +"slimer*50Footfungus*51Floppydwart*52Danglidwid*53Slimepole*5"
  161. +"4Sillywalker*55Flat Toed Whump*56Clingbeetle*57Leecheater*58"
  162. +"Maggotdangler*59Windpasser*60Fondlepiddle*61Crotchbug*62Toes"
  163. +"meller*63Slimemaggot*64Navelworm*65Earspider*66Noseleech*67N"
  164. +"ostrilworm*68Wedgiewart*69Cankerlicker*70Pimple Popper*71"; 
  165. var picker = "";
  166. var picker1 = "";
  167. var pos = 0;
  168. var pose = 0;
  169. var curse = "";
  170. var hinum = 0;
  171. var ndx1 = "";
  172. var ndx2 = "";
  173. function srand() {
  174. today=new Date();
  175. rand=today.getTime();
  176. picker="a"+rand;
  177. picker=picker.charAt((picker.length-4))
  178. +picker.charAt((picker.length-5));
  179. pos=picker;
  180. }
  181. function getCurse(form) {
  182. srand();
  183. hinum=70;
  184. correct_it();
  185. pos=isn1.indexOf(ndx1);
  186. pose=isn1.indexOf(ndx2);
  187. curse=isn1.substring((pos+3),pose);
  188. srand();
  189. hinum = 98;
  190. correct_it();
  191. pos=isn2.indexOf(ndx1);
  192. pose=isn2.indexOf(ndx2);
  193. curse+=" the "+isn2.substring((pos+3),pose);
  194. srand();
  195. hinum=98;
  196. correct_it();
  197. pos=isn3.indexOf(ndx1);
  198. pose = isn3.indexOf(ndx2);
  199. curse+=" "+isn3.substring((pos+3),pose)+"\r";
  200. srand();
  201. hinum=98;
  202. correct_it();
  203. pos=isn4.indexOf(ndx1);
  204. pose=isn4.indexOf(ndx2);
  205. curse+=isn4.substring((pos+3),pose);
  206. srand();
  207. hinum=98;
  208. correct_it();
  209. pos=isn5.indexOf(ndx1);
  210. pose=isn5.indexOf(ndx2);
  211. curse+=" from the "+isn5.substring((pos+3),pose);
  212. srand();
  213. hinum=70;
  214. correct_it();
  215. pos=isn6.indexOf(ndx1);
  216. pose=isn6.indexOf(ndx2);
  217. curse+=" of a "+isn6.substring((pos+3),pose);
  218. srand();
  219. hinum=70;
  220. correct_it();
  221. pos = isn7.indexOf(ndx1);
  222. pose = isn7.indexOf(ndx2);
  223. curse+=" "+isn7.substring((pos+3),pose)+".";
  224. }
  225. function correct_it() {
  226. if (pos<0) {
  227. pos=00;
  228. }
  229. if (pos>hinum) {
  230. pos=pos-30;
  231. }
  232. ndx1="*"+pos;
  233. pos++;
  234. if (pos<10) {
  235. ndx2="*0"+pos;
  236. }
  237. else {
  238. ndx2="*"+pos;
  239.    }
  240. }
  241. function getReload() {
  242. location.href="curse.html";
  243. }
  244. // End -->
  245. </SCRIPT>
  246.  
  247. <!-- STEP TWO: Copy this code into the BODY of your HTML document  -->
  248.  
  249. <BODY>
  250.  
  251. <SCRIPT LANGUAGE="JavaScript">
  252. <!-- Begin
  253. getCurse();
  254. document.write("<TABLE WIDTH=486 BORDER=2><TR><TD ALIGN=CENTER>" + "<FONT SIZE='+2' COLOR='maroon'><B>" + curse + "</B></TD></TR></TABLE>");
  255. // End Hiding -->
  256. </SCRIPT>
  257. <TABLE WIDTH=486 BORDER="0">
  258. <TR><TD ALIGN=CENTER>
  259. <FORM METHOD=POST>
  260. <P><INPUT TYPE="button" VALUE="Click Here for a New Curse" onClick="getReload()">
  261. </FORM>
  262. </TD></TR></TABLE>
  263.  
  264. <!-- Script Size:  11.70 KB  -->
  265.